home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 8 / The Arsenal Files Collection #8 (Arsenal Computer) (1996).ISO / g_quake / monsev10.zip / SHALRATH.QC < prev    next >
Text File  |  1996-09-06  |  9KB  |  250 lines
  1. /*
  2. ==============================================================================
  3.  
  4. SHAL-RATH
  5.  
  6. ==============================================================================
  7. */
  8. $cd /raid/quake/id1/models/shalrath
  9. $origin 0 0 24
  10. $base base
  11. $skin skin
  12. $scale 0.7
  13.  
  14. $frame attack1 attack2 attack3 attack4 attack5 attack6 attack7 attack8
  15. $frame attack9 attack10 attack11
  16.  
  17. $frame pain1 pain2 pain3 pain4 pain5 
  18.  
  19. $frame death1 death2 death3 death4 death5 death6 death7
  20.  
  21. $frame    walk1 walk2 walk3 walk4 walk5 walk6 walk7 walk8 walk9 walk10
  22. $frame    walk11 walk12
  23.  
  24. void() shalrath_pain;
  25. void() ShalMissile;
  26. void() shal_stand     =[      $walk1,       shal_stand    ] {ai_stand();};
  27.  
  28. void() shal_walk1     =[      $walk2,       shal_walk2    ] {
  29. if (random() < 0.2)
  30.     sound (self, CHAN_VOICE, "shalrath/idle.wav", 1, ATTN_IDLE);
  31. ai_walk(6);};
  32. void() shal_walk2     =[      $walk3,       shal_walk3    ] {ai_walk(4);};
  33. void() shal_walk3     =[      $walk4,       shal_walk4    ] {ai_walk(0);};
  34. void() shal_walk4     =[      $walk5,       shal_walk5    ] {ai_walk(0);};
  35. void() shal_walk5     =[      $walk6,       shal_walk6    ] {ai_walk(0);};
  36. void() shal_walk6     =[      $walk7,       shal_walk7    ] {ai_walk(0);};
  37. void() shal_walk7     =[      $walk8,       shal_walk8    ] {ai_walk(5);};
  38. void() shal_walk8     =[      $walk9,       shal_walk9    ] {ai_walk(6);};
  39. void() shal_walk9     =[      $walk10,       shal_walk10    ] {ai_walk(5);};
  40. void() shal_walk10    =[      $walk11,       shal_walk11    ] {ai_walk(0);};
  41. void() shal_walk11    =[      $walk12,       shal_walk12    ] {ai_walk(4);};
  42. void() shal_walk12    =[      $walk1,       shal_walk1    ] {ai_walk(5);};
  43.  
  44. void() shal_run1     =[      $walk2,       shal_run2    ] {
  45. if (random() < 0.2)
  46.     sound (self, CHAN_VOICE, "shalrath/idle.wav", 1, ATTN_IDLE);
  47.  
  48. //SCC.
  49.  
  50. ai_run(6);};
  51. void() shal_run2     =[      $walk3,       shal_run3    ] {ai_run(4);};
  52. void() shal_run3     =[      $walk4,       shal_run4    ] {ai_run(0);};
  53. void() shal_run4     =[      $walk5,       shal_run5    ] {ai_run(0);};
  54. void() shal_run5     =[      $walk6,       shal_run6    ] {ai_run(0);};
  55. void() shal_run6     =[      $walk7,       shal_run7    ] {ai_run(0);};
  56. void() shal_run7     =[      $walk8,       shal_run8    ] {ai_run(5);};
  57. void() shal_run8     =[      $walk9,       shal_run9    ] {ai_run(6);};
  58. void() shal_run9     =[      $walk10,       shal_run10    ] {ai_run(5);};
  59. void() shal_run10    =[      $walk11,       shal_run11    ] {ai_run(0);};
  60. void() shal_run11    =[      $walk12,       shal_run12    ] {ai_run(4);};
  61. void() shal_run12    =[      $walk1,       shal_run1    ] {ai_run(5);};
  62.  
  63. void() shal_attack1     =[      $attack1,       shal_attack2    ] {
  64. sound (self, CHAN_VOICE, "shalrath/attack.wav", 1, ATTN_NORM);
  65. ai_face();
  66. };
  67. void() shal_attack2     =[      $attack2,       shal_attack3    ] {ai_face();};
  68. void() shal_attack3     =[      $attack3,       shal_attack4    ] {ai_face();};
  69. void() shal_attack4     =[      $attack4,       shal_attack5    ] {ai_face();};
  70. void() shal_attack5     =[      $attack5,       shal_attack6    ] {ai_face();};
  71. void() shal_attack6     =[      $attack6,       shal_attack7    ] {ai_face();};
  72. void() shal_attack7     =[      $attack7,       shal_attack8    ] {ai_face();};
  73. void() shal_attack8     =[      $attack8,       shal_attack9    ] {ai_face();};
  74. void() shal_attack9     =[      $attack9,       shal_attack10   ] {ShalMissile();};
  75. void() shal_attack10    =[      $attack10,      shal_attack11   ] {ai_face();};
  76. void() shal_attack11    =[      $attack11,      shal_run1   ] {};
  77.  
  78. void() shal_pain1       =[      $pain1, shal_pain2      ] {};
  79. void() shal_pain2       =[      $pain2, shal_pain3      ] {};
  80. void() shal_pain3       =[      $pain3, shal_pain4      ] {};
  81. void() shal_pain4       =[      $pain4, shal_pain5      ] {};
  82. void() shal_pain5       =[      $pain5, shal_run1      ] {};
  83.  
  84. void() shal_death1      =[      $death1,        shal_death2     ] {};
  85. void() shal_death2      =[      $death2,        shal_death3     ] {};
  86. void() shal_death3      =[      $death3,        shal_death4     ] {};
  87. void() shal_death4      =[      $death4,        shal_death5     ] {};
  88. void() shal_death5      =[      $death5,        shal_death6     ] {};
  89. void() shal_death6      =[      $death6,        shal_death7     ] {};
  90. void() shal_death7      =[      $death7,        shal_death7    ] {};
  91.  
  92.  
  93. void() shalrath_pain =
  94. {
  95.     if (self.pain_finished > time)
  96.         return;
  97.  
  98.     sound (self, CHAN_VOICE, "shalrath/pain.wav", 1, ATTN_NORM);
  99.     shal_pain1();
  100.     self.pain_finished = time + 3;
  101. };
  102.  
  103. void() shalrath_die =
  104. {
  105. // check for gib
  106.     if (self.health < -90)
  107.     {
  108.         sound (self, CHAN_VOICE, "player/udeath.wav", 1, ATTN_NORM);
  109.         ThrowHead ("progs/h_shal.mdl", self.health);
  110.         ThrowGib ("progs/gib1.mdl", self.health);
  111.         ThrowGib ("progs/gib2.mdl", self.health);
  112.         ThrowGib ("progs/gib3.mdl", self.health);
  113.         return;
  114.     }
  115.  
  116.     sound (self, CHAN_VOICE, "shalrath/death.wav", 1, ATTN_NORM);
  117.     shal_death1();
  118.     self.solid = SOLID_NOT;
  119.     // insert death sounds here
  120. };
  121.  
  122. /*
  123. ================    //SCC.  The shalrath now throws splashing lavaballs.
  124. ShalMissile         //to change back to exploding spikes, just replace
  125. ================    //this SHALRATH.QC with the unmodified one.
  126. */            
  127.  
  128. void() ShalMissileTouch;
  129. void() ShalHome;
  130. void() ShalMissile =
  131. {
  132.         local   entity  missile, mpuff;
  133.     local    vector    dir;
  134.     local    float    dist, flytime;
  135.  
  136.     dir = normalize((self.enemy.origin + '0 0 10') - self.origin);
  137.     dist = vlen (self.enemy.origin - self.origin);
  138.     flytime = dist * 0.002;
  139.     if (flytime < 0.1)
  140.         flytime = 0.1;
  141.  
  142.     self.effects = self.effects | EF_MUZZLEFLASH;
  143.     sound (self, CHAN_WEAPON, "shalrath/attack2.wav", 1, ATTN_NORM);
  144.  
  145.         self.punchangle_x = -2;
  146.     missile = spawn ();
  147.     missile.owner = self;
  148.  
  149.     missile.solid = SOLID_BBOX;
  150.     missile.movetype = MOVETYPE_FLYMISSILE;
  151.         setmodel (missile, "progs/lavaball.mdl");
  152.  
  153.     setsize (missile, '0 0 0', '0 0 0');        
  154.  
  155.     missile.origin = self.origin + '0 0 10';
  156.     missile.velocity = dir * 400;
  157.         missile.avelocity = '100 200 300';
  158.     missile.nextthink = flytime + time;
  159.     missile.think = ShalHome;
  160.     missile.enemy = self.enemy;
  161.     missile.touch = ShalMissileTouch;
  162. };
  163.  
  164. void() ShalHome =
  165. {
  166.     local vector    dir, vtemp;
  167.     vtemp = self.enemy.origin + '0 0 10';
  168.     if (self.enemy.health < 1)
  169.     {
  170.         remove(self);
  171.         return;
  172.     }
  173.     dir = normalize(vtemp - self.origin);
  174.     if (skill == 3)
  175.         self.velocity = dir * 350;
  176.     else
  177.         self.velocity = dir * 250;
  178.     self.nextthink = time + 0.2;
  179.     self.think = ShalHome;    
  180. };
  181.  
  182. void() ShalMissileTouch =
  183. {
  184.     if (other == self.owner)
  185.         return;        // don't explode on owner
  186.  
  187.     if (other.classname == "monster_zombie")
  188.         T_Damage (other, self, self, 110);    
  189.     T_RadiusDamage (self, self.owner, 40, world);
  190.         sound (self, CHAN_WEAPON, "player/inlava.wav", 1, ATTN_NORM);
  191.  
  192.         self.origin = self.origin - 8*normalize(self.velocity);
  193.  
  194.     WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);
  195.         WriteByte (MSG_BROADCAST, TE_LAVASPLASH);    
  196.     WriteCoord (MSG_BROADCAST, self.origin_x);
  197.     WriteCoord (MSG_BROADCAST, self.origin_y);
  198.     WriteCoord (MSG_BROADCAST, self.origin_z);
  199.  
  200.         remove(self);  
  201.  
  202. //      self.velocity = '0 0 0';
  203. //      self.touch = SUB_Null;
  204. //      setmodel (self, "progs/s_explod.spr");
  205. //      self.solid = SOLID_NOT;
  206. //      s_explode1 ();
  207. };
  208.  
  209. //=================================================================
  210.  
  211. /*QUAKED monster_shalrath (1 0 0) (-32 -32 -24) (32 32 48) Ambush
  212. */
  213. void() monster_shalrath =
  214. {
  215.     if (deathmatch)
  216.     {
  217.         remove(self);
  218.         return;
  219.     }
  220.     precache_model2 ("progs/shalrath.mdl");
  221.     precache_model2 ("progs/h_shal.mdl");
  222.         precache_model2 ("progs/lavaball.mdl");
  223.     
  224.     precache_sound2 ("shalrath/attack.wav");
  225.     precache_sound2 ("shalrath/attack2.wav");
  226.     precache_sound2 ("shalrath/death.wav");
  227.     precache_sound2 ("shalrath/idle.wav");
  228.     precache_sound2 ("shalrath/pain.wav");
  229.     precache_sound2 ("shalrath/sight.wav");
  230.         precache_sound2 ("player/inlava.wav");
  231.  
  232.     self.solid = SOLID_SLIDEBOX;
  233.     self.movetype = MOVETYPE_STEP;
  234.     
  235.     setmodel (self, "progs/shalrath.mdl");
  236.     setsize (self, VEC_HULL2_MIN, VEC_HULL2_MAX);
  237.     self.health = 400;
  238.  
  239.     self.th_stand = shal_stand;
  240.     self.th_walk = shal_walk1;
  241.     self.th_run = shal_run1;
  242.     self.th_die = shalrath_die;
  243.     self.th_pain = shalrath_pain;
  244.     self.th_missile = shal_attack1;
  245.  
  246.     self.think = walkmonster_start;
  247.     self.nextthink = time + 0.1 + random ()*0.1;    
  248.  
  249. };
  250.